home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / compuserve-file-archive / 10 Education Games / CHEM.SFX / keq (.txt) < prev    next >
Commodore BASIC  |  1990-02-12  |  516b  |  14 lines
  1. 1 POKE788,52:POKE 46,10:REM NAME "KEQ"
  2. 2 PRINT"[147]   HARVEY BLANCK,    CHEMISTRY DEPT."
  3. 3 PRINT"     AUSTIN PEAY STATE UNIVERSITY"
  4. 4 PRINT"     CLARKSVILLE, TN 37044  (1985)"
  5. 5 REM LOAD CHARACTER PROG TO 4096
  6. 6 POKE4096,0:POKE4097,0:POKE4098,0
  7. 7 POKE44,16
  8. 8 POKE214,10:PRINT" "
  9. 9 PRINT"       CHARACTER ALTER PROGRAM"
  10. 10 PRINT"      ! [186] # $ % & ' [169] [255] @ [219] [221] \"
  11. 11 PRINT"           A[146] B[146] J[146] D[146] F[146] G[146]"
  12. 12 PRINT"    FOLLOWED BY MAIN PROGRAM LOADING"
  13. 20 LOAD"KEQ1",8
  14.